* lisp/gnus/gmm-utils.el (gmm-write-region): Drop Emacs 20 compat cruft.
authorGlenn Morris <rgm@gnu.org>
Sun, 3 Oct 2010 02:01:07 +0000 (19:01 -0700)
committerGlenn Morris <rgm@gnu.org>
Sun, 3 Oct 2010 02:01:07 +0000 (19:01 -0700)
lisp/gnus/ChangeLog
lisp/gnus/gmm-utils.el

index 20a4f8245006b21a52256ece7cb1d18c202f148f..5a175e0131600742086dccf3ff199acf5f729224 100644 (file)
@@ -1,5 +1,7 @@
 2010-10-03  Glenn Morris  <rgm@gnu.org>
 
+       * gmm-utils.el (gmm-write-region): Drop Emacs 20 compat cruft.
+
        * gnus-util.el (gnus-make-local-hook): Simplify.
 
 2010-10-02  Julien Danjou  <julien@danjou.info>
index b76db479dfb7091adea1f3b7464a934e035bff21..e16fc5efa6344fed5b2bd8c57a9f9d5cad29e3fa 100644 (file)
@@ -1,6 +1,7 @@
 ;;; gmm-utils.el --- Utility functions for Gnus, Message and MML
 
-;; Copyright (C) 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
+;; Copyright (C) 2006, 2007, 2008, 2009, 2010
+;;   Free Software Foundation, Inc.
 
 ;; Author: Reiner Steib <reiner.steib@gmx.de>
 ;; Keywords: news
@@ -411,12 +412,9 @@ If mode is nil, use `major-mode' of the current buffer."
 
 In XEmacs, the seventh argument of `write-region' specifies the
 coding-system."
-  (if (and mustbenew
-          (or (featurep 'xemacs)
-              (= emacs-major-version 20)))
+  (if (and mustbenew (featurep 'xemacs))
       (if (file-exists-p filename)
-         (signal 'file-already-exists
-                 (list "File exists" filename))
+         (signal 'file-already-exists (list "File exists" filename))
        (write-region start end filename append visit lockname))
     (write-region start end filename append visit lockname mustbenew)))